home *** CD-ROM | disk | FTP | other *** search
/ Languguage OS 2 / Languguage OS II Version 10-94 (Knowledge Media)(1994).ISO / gnu / button12.lha / button8806gnued.ps < prev    next >
Text File  |  1993-08-05  |  4KB  |  88 lines
  1. % 
  2. % button8806gnued.ps - A GNU Button Program
  3. % 
  4. % This program may be freely redistributed under the terms of the GNU
  5. % General Public License.
  6. % 
  7. % Copyright 1988, 1992 Free Software Foundation
  8. % 
  9. % This GNU Button program is distributed in the hope that it will be
  10. % useful, but WITHOUT ANY WARRANTY.  No author or distributor accepts
  11. % responsibility to anyone for the consequences of using it or for
  12. % whether it serves any particular purpose or works at all, unless he
  13. % says so in writing.  Refer to the GNU General Public License for
  14. % full details.
  15. % 
  16. % Everyone is granted permission to copy, modify and redistribute this
  17. % GNU Button Program, but only under the condaitions described in the
  18. % GNU General Public License.  A copy of this license is supposed to
  19. % have been given to you along with the GNU Button Program so you can
  20. % know your rights and responsibilities.  It should be in a file named
  21. % COPYING.  Among other things, the copyright notice and this notice
  22. % must be preserved on all copies.
  23. % 
  24. % Hard copies of this button were first distributed at the June 1988
  25. % SanFrancisco Usenix.  They had black Lettering on a yellow
  26. % background on a standard 2 1/4" safety pin button.  They were
  27. % designed by Leonard H. Tower Jr. who is also the author of this GNU
  28. % Button Program.
  29. % 
  30. % Report bugs or improvements to: tower@prep.ai.mit.edu
  31. % 
  32. % Hard copies of this button are probably still available.  One much
  33. % have either donated source code or documentation to the GNU Project
  34. % or make a donation of at least $ 2.00 for each button.
  35. % 
  36. % If you wish a hard copy of a gnu button send:
  37. %     - a self-addressed, stamped envelope; and
  38. %     - either:
  39. %         - a reminder of your source or documentation contribution; or
  40. %         - a donation payable to the "Free Software Foundation"; and
  41. %    - specify whether you want the Feb 88 or June 88 button or both.
  42. % to:    L. Tower Jr.
  43. %     36 Porter Street
  44. %     Somerville, MA 02143, USA
  45. % 
  46. % This program is available for anonymous ftp in
  47. % prep.ai.mit.edu:/u2/emacs/button.N.MM.shar.  It is probably
  48. % available in other source archives.
  49. %
  50. % Modified Nov-90 by trent@cs.pdx.edu
  51. % an image of a Gnu (the animal is in the center instead
  52. % of the word "GNU".  Some guy posted this image (as a Sun Icon)
  53. % on gnu.emacs a while back, but I don't know who anymore.
  54. %
  55.  
  56. % Uses {in,out}sidecircletext routines from Adobe Cookbook.
  57. .so circtext.ps
  58. .so gnu.ps
  59.    
  60. % center button on 8 1/2" x 11" page
  61. 306 396 translate
  62.  
  63. % This is a kludge to give better edge resolution.
  64. % Note that postscript's scale command doesn't cut it.
  65. % It scales after the edges are set.
  66. % biggg is set to 2,3, or 4 to make a master that is that much larger.
  67. % The master is reduced that much by the button manufacturer.
  68. % If only 1200 dpi postscript printers were more common ...
  69. /biggg 1 def
  70.  
  71. gsave
  72.    70 biggg mul 2 div neg dup translate
  73.    72 biggg mul 72 biggg mul scale
  74.    64 64 true [ 64 0 0 -64 0 64 ] {Gnu} imagemask
  75. grestore
  76. /Times-Bold findfont 14 biggg mul scalefont setfont
  77. (GNU's Not Unix)
  78.   14 biggg mul 270 64 biggg mul insidecircletext
  79. /Times-Roman findfont 7.5 biggg mul scalefont setfont
  80. (Copyright 1988 Free Software Foundation)
  81.   7.5 biggg mul 270 75 biggg mul insidecircletext
  82. (This button design may be freely redistributed under the terms of the GNU General Public License.)
  83.   7.5 biggg mul 90 69 biggg mul outsidecircletext
  84. /Times-Roman findfont 7 biggg mul scalefont setfont
  85. (Anonymous ftp this button's postscript program from prep.ai.mit.edu:/u/emacs/button.N.MM.shar.)
  86.   7 biggg mul 90 61 biggg mul outsidecircletext
  87. showpage
  88.